Mac Power 1997 January

home *** CD-ROM | disk | FTP | other *** search
/ Mac Power 1997 January / macpower199701.bin / AMUG / Programming_10 / ICPAppSource+ICprogKit / ICAppSourceKit 1.3.sit / ICAppSourceKit1.3 / InternetConfig.p < prev next >
MacBinary | 1996-07-20 | 2.9 KB | [TEXT/CWIE]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: InternetConfig.p
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	ZX81 Sinclair BASIC `(image/sinclairBASIC)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Applause Picture `(image/applausePicture)`	ext	Unsupported
`1%`	dexvert	bsdiff patch `(other/bsdiffPatch)`	ext	Unsupported
`1%`	dexvert	imgdiff patch `(other/imgdiffPatch)`	ext	Unsupported
`1%`	dexvert	MATLAB p-code `(other/matlabPCode)`	ext	Unsupported
`1%`	dexvert	WSUS Patch Storage File `(other/wsusPatchStorageFile)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Sat Jul 20 16:09:13 1996, modified Sat Jul 20 16:09:13 1996, creator 'CWIE', type ASCII, 2278 bytes "InternetConfig.p" , at 0x966 410 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[CWIE]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 10 49 6e 74 65 72 6e | 65 74 43 6f 6e 66 69 67 |..Intern|etConfig|
|00000010| 2e 70 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.p......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 08 e6 00 | 00 01 9a ae 16 ed 69 ae |........|......i.|
|00000060| 16 ed 69 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..i.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 50 03 00 00 |........|....P...|
|00000080| 70 72 6f 67 72 61 6d 20 | 49 6e 74 65 72 6e 65 74 |program |Internet|
|00000090| 43 6f 6e 66 69 67 3b 0d | 0d 09 75 73 65 73 0d 09 |Config;.|..uses..|
|000000a0| 09 53 65 67 4c 6f 61 64 | 2c 20 52 65 71 75 69 72 |.SegLoad|, Requir|
|000000b0| 65 64 45 76 65 6e 74 53 | 75 70 70 6f 72 74 2c 7b |edEventS|upport,{|
|000000c0| 7d 0d 09 09 49 43 47 6c | 6f 62 61 6c 73 2c 20 49 |}...ICGl|obals, I|
|000000d0| 43 44 6f 63 75 6d 65 6e | 74 2c 20 49 43 45 76 65 |CDocumen|t, ICEve|
|000000e0| 6e 74 73 2c 20 49 43 57 | 69 6e 64 6f 77 73 2c 20 |nts, ICW|indows, |
|000000f0| 49 43 49 6e 73 74 61 6c | 6c 2c 20 49 43 49 63 6f |ICInstal|l, ICIco|
|00000100| 6e 53 75 69 74 65 73 2c | 20 49 43 4d 69 73 63 53 |nSuites,| ICMiscS|
|00000110| 75 62 73 2c 20 49 43 45 | 64 69 74 50 72 65 66 41 |ubs, ICE|ditPrefA|
|00000120| 70 70 6c 65 45 76 65 6e | 74 73 2c 20 49 43 49 6e |ppleEven|ts, ICIn|
|00000130| 69 74 69 61 6c 69 7a 61 | 74 69 6f 6e 3b 0d 0d 09 |itializa|tion;...|
|00000140| 66 75 6e 63 74 69 6f 6e | 20 44 6f 4f 70 65 6e 41 |function| DoOpenA|
|00000150| 70 70 56 69 61 41 70 70 | 6c 65 45 76 65 6e 74 3a |ppViaApp|leEvent:|
|00000160| 20 4f 53 45 72 72 3b 0d | 09 09 76 61 72 0d 09 09 | OSErr;.|..var...|
|00000170| 09 65 72 72 20 3a 20 4f | 53 45 72 72 3b 0d 09 62 |.err : O|SErr;..b|
|00000180| 65 67 69 6e 0d 09 09 65 | 72 72 20 3a 3d 20 44 6f |egin...e|rr := Do|
|00000190| 4f 70 65 6e 41 70 70 3b | 0d 09 09 69 66 20 65 72 |OpenApp;|...if er|
|000001a0| 72 20 3c 3e 20 6e 6f 45 | 72 72 20 74 68 65 6e 20 |r <> noE|rr then |
|000001b0| 62 65 67 69 6e 0d 09 09 | 09 69 66 20 41 45 49 6e |begin...|.if AEIn|
|000001c0| 74 65 72 61 63 74 57 69 | 74 68 55 73 65 72 28 6b |teractWi|thUser(k|
|000001d0| 41 45 44 65 66 61 75 6c | 74 54 69 6d 65 6f 75 74 |AEDefaul|tTimeout|
|000001e0| 2c 20 6e 69 6c 2c 20 6e | 69 6c 29 20 3d 20 6e 6f |, nil, n|il) = no|
|000001f0| 45 72 72 20 74 68 65 6e | 20 62 65 67 69 6e 0d 09 |Err then| begin..|
|00000200| 09 09 09 44 69 73 70 6c | 61 79 45 72 72 6f 72 28 |...Displ|ayError(|
|00000210| 61 63 4e 65 77 44 6f 63 | 75 6d 65 6e 74 2c 20 65 |acNewDoc|ument, e|
|00000220| 72 72 29 3b 0d 09 09 09 | 65 6e 64 3b 20 28 2a 20 |rr);....|end; (* |
|00000230| 69 66 20 2a 29 0d 09 09 | 65 6e 64 3b 20 28 2a 20 |if *)...|end; (* |
|00000240| 69 66 20 2a 29 0d 09 09 | 44 6f 4f 70 65 6e 41 70 |if *)...|DoOpenAp|
|00000250| 70 56 69 61 41 70 70 6c | 65 45 76 65 6e 74 20 3a |pViaAppl|eEvent :|
|00000260| 3d 20 65 72 72 3b 0d 09 | 65 6e 64 3b 20 28 2a 20 |= err;..|end; (* |
|00000270| 44 6f 4f 70 65 6e 41 70 | 70 56 69 61 41 70 70 6c |DoOpenAp|pViaAppl|
|00000280| 65 45 76 65 6e 74 20 2a | 29 0d 0d 09 66 75 6e 63 |eEvent *|)...func|
|00000290| 74 69 6f 6e 20 44 6f 4f | 70 65 6e 44 6f 63 56 69 |tion DoO|penDocVi|
|000002a0| 61 41 70 70 6c 65 45 76 | 65 6e 74 20 28 66 73 73 |aAppleEv|ent (fss|
|000002b0| 3a 20 46 53 53 70 65 63 | 29 3a 20 4f 53 45 72 72 |: FSSpec|): OSErr|
|000002c0| 3b 0d 09 09 76 61 72 0d | 09 09 09 65 72 72 20 3a |;...var.|...err :|
|000002d0| 20 4f 53 45 72 72 3b 0d | 09 62 65 67 69 6e 0d 09 | OSErr;.|.begin..|
|000002e0| 09 65 72 72 20 3a 3d 20 | 44 6f 4f 70 65 6e 44 6f |.err := |DoOpenDo|
|000002f0| 63 28 66 73 73 29 3b 0d | 09 09 69 66 20 65 72 72 |c(fss);.|..if err|
|00000300| 20 3c 3e 20 6e 6f 45 72 | 72 20 74 68 65 6e 20 62 | <> noEr|r then b|
|00000310| 65 67 69 6e 0d 09 09 09 | 69 66 20 41 45 49 6e 74 |egin....|if AEInt|
|00000320| 65 72 61 63 74 57 69 74 | 68 55 73 65 72 28 6b 41 |eractWit|hUser(kA|
|00000330| 45 44 65 66 61 75 6c 74 | 54 69 6d 65 6f 75 74 2c |EDefault|Timeout,|
|00000340| 20 6e 69 6c 2c 20 6e 69 | 6c 29 20 3d 20 6e 6f 45 | nil, ni|l) = noE|
|00000350| 72 72 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 09 09 |rr then |begin...|
|00000360| 09 09 44 69 73 70 6c 61 | 79 45 72 72 6f 72 28 61 |..Displa|yError(a|
|00000370| 63 4f 70 65 6e 44 6f 63 | 75 6d 65 6e 74 2c 20 65 |cOpenDoc|ument, e|
|00000380| 72 72 29 3b 0d 09 09 09 | 65 6e 64 3b 20 28 2a 20 |rr);....|end; (* |
|00000390| 69 66 20 2a 29 0d 09 09 | 65 6e 64 3b 20 28 2a 20 |if *)...|end; (* |
|000003a0| 69 66 20 2a 29 0d 09 09 | 44 6f 4f 70 65 6e 44 6f |if *)...|DoOpenDo|
|000003b0| 63 56 69 61 41 70 70 6c | 65 45 76 65 6e 74 20 3a |cViaAppl|eEvent :|
|000003c0| 3d 20 65 72 72 3b 0d 09 | 65 6e 64 3b 20 28 2a 20 |= err;..|end; (* |
|000003d0| 44 6f 4f 70 65 6e 44 6f | 63 56 69 61 41 70 70 6c |DoOpenDo|cViaAppl|
|000003e0| 65 45 76 65 6e 74 20 2a | 29 0d 0d 09 70 72 6f 63 |eEvent *|)...proc|
|000003f0| 65 64 75 72 65 20 48 61 | 6e 64 6c 65 41 70 70 50 |edure Ha|ndleAppP|
|00000400| 61 72 61 6d 73 3b 0d 09 | 09 76 61 72 0d 09 09 09 |arams;..|.var....|
|00000410| 61 70 5f 66 69 6c 65 3a | 20 41 70 70 46 69 6c 65 |ap_file:| AppFile|
|00000420| 3b 0d 09 09 09 66 73 73 | 3a 20 46 53 53 70 65 63 |;....fss|: FSSpec|
|00000430| 3b 0d 09 09 09 6d 73 67 | 2c 20 63 6f 75 6e 74 3a |;....msg|, count:|
|00000440| 20 69 6e 74 65 67 65 72 | 3b 0d 09 09 09 6a 75 6e | integer|;....jun|
|00000450| 6b 3a 20 4f 53 45 72 72 | 3b 0d 09 09 09 6a 75 6e |k: OSErr|;....jun|
|00000460| 6b 6c 6f 6e 67 3a 20 6c | 6f 6e 67 69 6e 74 3b 0d |klong: l|ongint;.|
|00000470| 09 62 65 67 69 6e 0d 09 | 09 69 66 20 68 61 73 5f |.begin..|.if has_|
|00000480| 41 70 70 6c 65 45 76 65 | 6e 74 73 20 74 68 65 6e |AppleEve|nts then|
|00000490| 20 62 65 67 69 6e 0d 09 | 09 09 6a 75 6e 6b 20 3a | begin..|..junk :|
|000004a0| 3d 20 49 6e 69 74 41 70 | 70 6c 65 45 76 65 6e 74 |= InitAp|pleEvent|
|000004b0| 73 28 40 44 6f 4f 70 65 | 6e 41 70 70 56 69 61 41 |s(@DoOpe|nAppViaA|
|000004c0| 70 70 6c 65 45 76 65 6e | 74 2c 20 40 44 6f 4f 70 |ppleEven|t, @DoOp|
|000004d0| 65 6e 44 6f 63 56 69 61 | 41 70 70 6c 65 45 76 65 |enDocVia|AppleEve|
|000004e0| 6e 74 2c 20 6e 69 6c 2c | 20 40 44 6f 51 75 69 74 |nt, nil,| @DoQuit|
|000004f0| 29 3b 0d 09 09 65 6e 64 | 20 65 6c 73 65 20 62 65 |);...end| else be|
|00000500| 67 69 6e 0d 09 09 09 43 | 6f 75 6e 74 41 70 70 46 |gin....C|ountAppF|
|00000510| 69 6c 65 73 28 6d 73 67 | 2c 20 63 6f 75 6e 74 29 |iles(msg|, count)|
|00000520| 3b 0d 09 09 09 69 66 20 | 63 6f 75 6e 74 20 3c 3d |;....if |count <=|
|00000530| 20 30 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 09 09 | 0 then |begin...|
|00000540| 09 09 44 69 73 70 6c 61 | 79 45 72 72 6f 72 28 61 |..Displa|yError(a|
|00000550| 63 4e 65 77 44 6f 63 75 | 6d 65 6e 74 2c 20 44 6f |cNewDocu|ment, Do|
|00000560| 4f 70 65 6e 41 70 70 29 | 3b 0d 09 09 09 65 6e 64 |OpenApp)|;....end|
|00000570| 20 65 6c 73 65 20 62 65 | 67 69 6e 0d 09 09 09 09 | else be|gin.....|
|00000580| 47 65 74 41 70 70 46 69 | 6c 65 73 28 31 2c 20 61 |GetAppFi|les(1, a|
|00000590| 70 5f 66 69 6c 65 29 3b | 0d 09 09 09 09 43 6c 72 |p_file);|.....Clr|
|000005a0| 41 70 70 46 69 6c 65 73 | 28 31 29 3b 0d 09 09 09 |AppFiles|(1);....|
|000005b0| 09 69 66 20 47 65 74 57 | 44 49 6e 66 6f 28 61 70 |.if GetW|DInfo(ap|
|000005c0| 5f 66 69 6c 65 2e 76 52 | 65 66 4e 75 6d 2c 20 66 |_file.vR|efNum, f|
|000005d0| 73 73 2e 76 52 65 66 4e | 75 6d 2c 20 66 73 73 2e |ss.vRefN|um, fss.|
|000005e0| 70 61 72 49 44 2c 20 6a | 75 6e 6b 6c 6f 6e 67 29 |parID, j|unklong)|
|000005f0| 20 3d 20 6e 6f 45 72 72 | 20 74 68 65 6e 20 62 65 | = noErr| then be|
|00000600| 67 69 6e 0d 09 09 09 09 | 09 66 73 73 2e 6e 61 6d |gin.....|.fss.nam|
|00000610| 65 20 3a 3d 20 61 70 5f | 66 69 6c 65 2e 66 4e 61 |e := ap_|file.fNa|
|00000620| 6d 65 3b 0d 09 09 09 09 | 09 44 69 73 70 6c 61 79 |me;.....|.Display|
|00000630| 45 72 72 6f 72 28 61 63 | 4f 70 65 6e 44 6f 63 75 |Error(ac|OpenDocu|
|00000640| 6d 65 6e 74 2c 20 44 6f | 4f 70 65 6e 44 6f 63 28 |ment, Do|OpenDoc(|
|00000650| 66 73 73 29 29 3b 0d 09 | 09 09 09 65 6e 64 3b 20 |fss));..|...end; |
|00000660| 28 2a 20 69 66 20 2a 29 | 0d 09 09 09 65 6e 64 3b |(* if *)|....end;|
|00000670| 20 28 2a 20 69 66 20 2a | 29 0d 09 09 65 6e 64 3b | (* if *|)...end;|
|00000680| 20 28 2a 20 69 66 20 2a | 29 0d 09 65 6e 64 3b 20 | (* if *|)..end; |
|00000690| 28 2a 20 48 61 6e 64 6c | 65 41 70 70 50 61 72 61 |(* Handl|eAppPara|
|000006a0| 6d 73 20 2a 29 0d 0d 09 | 76 61 72 0d 09 09 6d 62 |ms *)...|var...mb|
|000006b0| 61 72 3a 20 48 61 6e 64 | 6c 65 3b 0d 09 09 65 72 |ar: Hand|le;...er|
|000006c0| 72 3a 20 4f 53 45 72 72 | 3b 0d 62 65 67 69 6e 0d |r: OSErr|;.begin.|
|000006d0| 09 49 6e 69 74 69 61 6c | 69 7a 61 74 69 6f 6e 3b |.Initial|ization;|
|000006e0| 0d 09 6d 62 61 72 20 3a | 3d 20 47 65 74 4e 65 77 |..mbar :|= GetNew|
|000006f0| 4d 42 61 72 28 31 32 38 | 29 3b 0d 09 69 66 20 6d |MBar(128|);..if m|
|00000700| 62 61 72 20 3d 20 6e 69 | 6c 20 74 68 65 6e 20 62 |bar = ni|l then b|
|00000710| 65 67 69 6e 0d 09 09 45 | 78 69 74 54 6f 53 68 65 |egin...E|xitToShe|
|00000720| 6c 6c 3b 0d 09 65 6e 64 | 3b 20 28 2a 20 69 66 20 |ll;..end|; (* if |
|00000730| 2a 29 0d 09 53 65 74 4d | 65 6e 75 42 61 72 28 6d |*)..SetM|enuBar(m|
|00000740| 62 61 72 29 3b 0d 09 41 | 70 70 65 6e 64 52 65 73 |bar);..A|ppendRes|
|00000750| 4d 65 6e 75 28 47 65 74 | 4d 65 6e 75 48 61 6e 64 |Menu(Get|MenuHand|
|00000760| 6c 65 28 4d 5f 41 70 70 | 6c 65 29 2c 20 27 44 52 |le(M_App|le), 'DR|
|00000770| 56 52 27 29 3b 0d 09 44 | 72 61 77 4d 65 6e 75 42 |VR');..D|rawMenuB|
|00000780| 61 72 3b 0d 09 49 6e 69 | 74 47 6c 6f 62 61 6c 73 |ar;..Ini|tGlobals|
|00000790| 3b 0d 09 49 6e 69 74 4d | 69 73 63 53 75 62 73 3b |;..InitM|iscSubs;|
|000007a0| 0d 09 49 6e 69 74 49 43 | 49 63 6f 6e 53 75 69 74 |..InitIC|IconSuit|
|000007b0| 65 73 3b 0d 09 65 72 72 | 20 3a 3d 20 49 6e 69 74 |es;..err| := Init|
|000007c0| 49 43 57 69 6e 64 6f 77 | 73 3b 0d 09 69 66 20 65 |ICWindow|s;..if e|
|000007d0| 72 72 20 3d 20 6e 6f 45 | 72 72 20 74 68 65 6e 20 |rr = noE|rr then |
|000007e0| 62 65 67 69 6e 0d 09 09 | 65 72 72 20 3a 3d 20 49 |begin...|err := I|
|000007f0| 6e 69 74 69 61 6c 69 7a | 65 43 6f 6d 70 6f 6e 65 |nitializ|eCompone|
|00000800| 6e 74 49 6e 73 74 61 6c | 6c 61 74 69 6f 6e 3b 0d |ntInstal|lation;.|
|00000810| 09 65 6e 64 3b 20 28 2a | 20 69 66 20 2a 29 0d 09 |.end; (*| if *)..|
|00000820| 69 66 20 65 72 72 20 3d | 20 6e 6f 45 72 72 20 74 |if err =| noErr t|
|00000830| 68 65 6e 20 62 65 67 69 | 6e 0d 09 09 65 72 72 20 |hen begi|n...err |
|00000840| 3a 3d 20 49 6e 69 74 49 | 43 44 6f 63 75 6d 65 6e |:= InitI|CDocumen|
|00000850| 74 3b 0d 09 65 6e 64 3b | 20 28 2a 20 69 66 20 2a |t;..end;| (* if *|
|00000860| 29 0d 09 69 66 20 65 72 | 72 20 3c 3e 20 6e 6f 45 |)..if er|r <> noE|
|00000870| 72 72 20 74 68 65 6e 20 | 62 65 67 69 6e 0d 09 09 |rr then |begin...|
|00000880| 44 69 73 70 6c 61 79 45 | 72 72 6f 72 28 61 63 53 |DisplayE|rror(acS|
|00000890| 74 61 72 74 41 70 70 6c | 69 63 61 74 69 6f 6e 2c |tartAppl|ication,|
|000008a0| 20 65 72 72 29 3b 0d 09 | 09 45 78 69 74 54 6f 53 | err);..|.ExitToS|
|000008b0| 68 65 6c 6c 3b 0d 09 65 | 6e 64 3b 20 28 2a 20 69 |hell;..e|nd; (* i|
|000008c0| 66 20 2a 29 0d 09 48 61 | 6e 64 6c 65 41 70 70 50 |f *)..Ha|ndleAppP|
|000008d0| 61 72 61 6d 73 3b 0d 09 | 53 65 74 75 70 45 64 69 |arams;..|SetupEdi|
|000008e0| 74 50 72 65 66 41 70 70 | 6c 65 45 76 65 6e 74 3b |tPrefApp|leEvent;|
|000008f0| 0d 09 49 6e 69 74 43 75 | 72 73 6f 72 3b 0d 09 77 |..InitCu|rsor;..w|
|00000900| 68 69 6c 65 20 6e 6f 74 | 20 71 75 69 74 6e 6f 77 |hile not| quitnow|
|00000910| 20 64 6f 20 62 65 67 69 | 6e 0d 09 09 48 61 6e 64 | do begi|n...Hand|
|00000920| 6c 65 45 76 65 6e 74 73 | 3b 0d 09 65 6e 64 3b 20 |leEvents|;..end; |
|00000930| 28 2a 20 77 68 69 6c 65 | 20 2a 29 0d 09 54 65 72 |(* while| *)..Ter|
|00000940| 6d 49 43 44 6f 63 75 6d | 65 6e 74 3b 0d 65 6e 64 |mICDocum|ent;.end|
|00000950| 2e 20 28 2a 20 49 6e 74 | 65 72 6e 65 74 43 6f 6e |. (* Int|ernetCon|
|00000960| 66 69 67 20 2a 29 00 00 | 00 00 00 00 00 00 00 00 |fig *)..|........|
|00000970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000980| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00000990| 70 2c 20 72 2e 74 6f 70 | 29 3b 0d 09 09 50 65 6e |p, r.top|);...Pen|
|000009a0| 4e 6f 72 6d 61 6c 3b 0d | 09 65 6e 64 3b 0d 0d 09 |Normal;.|.end;...|
|000009b0| 10 49 6e 74 65 72 6e 65 | 74 43 6f 6e 66 69 67 2e |.Interne|tConfig.|
|000009c0| 70 74 02 00 00 00 54 45 | 58 54 43 57 49 45 00 00 |pt....TE|XTCWIE..|
|000009d0| 00 00 54 45 58 54 43 57 | 49 45 00 00 01 6c 01 00 |..TEXTCW|IE...l..|
|000009e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009f0| 00 00 aa 7b 00 af 00 00 | 08 e6 00 00 01 9a 67 65 |...{....|......ge|
|00000a00| 72 3b 0d 09 62 65 67 69 | 6e 0d 09 09 70 20 3a 3d |r;..begi|n...p :=|
|00000a10| 20 50 6f 73 28 73 75 62 | 2c 20 73 29 3b 0d 09 09 | Pos(sub|, s);...|
|00000a20| 69 66 20 70 20 3e 20 30 | 20 74 68 65 6e 20 62 65 |if p > 0| then be|
|00000a30| 67 69 6e 0d 09 09 09 73 | 31 20 3a 3d 20 63 6f 70 |gin....s|1 := cop|
|00000a40| 79 28 73 2c 20 31 2c 20 | 70 20 2d 20 31 29 3b 0d |y(s, 1, |p - 1);.|
|00000a50| 09 09 09 73 32 20 3a 3d | 20 63 6f 70 79 28 73 2c |...s2 :=| copy(s,|
|00000a60| 20 70 20 2b 20 6c 65 6e | 67 74 68 28 73 75 62 29 | p + len|gth(sub)|
|00000a70| 2c 20 32 35 35 29 3b 0d | 09 09 65 6e 64 3b 0d 09 |, 255);.|..end;..|
|00000a80| 00 00 00 48 00 09 47 65 | 6e 65 76 61 00 00 00 00 |...H..Ge|neva....|
|00000a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000aa0| 00 00 00 00 00 00 00 03 | 00 02 00 3e 00 04 01 cd |........|...>....|
|00000ab0| 02 63 00 3e 00 04 01 cd | 02 63 ae 16 b6 34 00 00 |.c.>....|.c...4..|
|00000ac0| 00 e8 00 00 00 e8 00 00 | 00 19 01 00 00 00 00 04 |........|........|
|00000ad0| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|00000ae0| 00 00 00 46 00 5c be d4 | 13 d6 00 00 00 1c 00 46 |...F.\..|.......F|
|00000af0| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00000b00| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00000b10| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|00000b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+